home *** CD-ROM | disk | FTP | other *** search
/ Apple WWDC 1996 / WWDC96_1996 (CD).toast / Technology Materials / MacOS 8 Resources / Developer Tools / Mac OS 8 Interfaces & Libraries / Interfaces / AIncludes / ToolUtils.a < prev    next >
Encoding:
Text File  |  1996-05-01  |  3.3 KB  |  168 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        ToolUtils.a
  3. ;
  4. ;    Contains:    Toolbox Utilities Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Release:    Universal Interfaces 3.0d3 on Copland DR1
  8. ;
  9. ;    Copyright:    © 1984-1996 by Apple Computer, Inc.  All rights reserved.
  10. ;
  11. ;    Bugs?:        If you find a problem with this file, send the file and version
  12. ;                information (from above) and the problem description to:
  13. ;
  14. ;                    Internet:    apple.bugs@applelink.apple.com
  15. ;                    AppleLink:    APPLE.BUGS
  16. ;
  17. ;
  18.     IF &TYPE('__TOOLUTILS__') = 'UNDEFINED' THEN
  19. __TOOLUTILS__ SET 1
  20.  
  21.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  22.     include 'Types.a'
  23.     ENDIF
  24.     IF &TYPE('__OSUTILS__') = 'UNDEFINED' THEN
  25.     include 'OSUtils.a'
  26.     ENDIF
  27.     IF OLDROUTINELOCATIONS THEN
  28.     IF &TYPE('__FIXMATH__') = 'UNDEFINED' THEN
  29.     include 'FixMath.a'
  30.     ENDIF
  31.     IF &TYPE('__ICONS__') = 'UNDEFINED' THEN
  32.     include 'Icons.a'
  33.     ENDIF
  34.     IF &TYPE('__QUICKDRAW__') = 'UNDEFINED' THEN
  35.     include 'Quickdraw.a'
  36.     ENDIF
  37.     IF &TYPE('__TEXTUTILS__') = 'UNDEFINED' THEN
  38.     include 'TextUtils.a'
  39.     ENDIF
  40.     ENDIF
  41. ;
  42. ;————————————————————————————————————————————————————————————————————————————————————
  43. ;    Note: 
  44. ;    
  45. ;    The following routines that used to be in this header file, have moved to
  46. ;    more appropriate headers.  If OLDROUTINELOCATIONS is 0, then you will have
  47. ;    to include the headers below to use the following functions.
  48. ;    
  49. ;        FixMath.h:        FixMul
  50. ;                        FixRatio
  51. ;                        FixRound
  52. ;        
  53. ;        Icons.h:          GetIcon
  54. ;                        PlotIcon
  55. ;                        
  56. ;        Quickdraw.h:    AngleFromSlope
  57. ;                        DeltaPoint
  58. ;                        GetCursor
  59. ;                        GetIndPattern
  60. ;                        GetPattern
  61. ;                        GetPicture
  62. ;                        PackBits
  63. ;                        ScreenRes
  64. ;                        ShieldCursor
  65. ;                        SlopeFromAngle
  66. ;                        UnpackBits
  67. ;                        
  68. ;        TextUtils.h:    Munger
  69. ;                        GetIndString
  70. ;                        GetString
  71. ;                        NewString
  72. ;                        SetString
  73. ;————————————————————————————————————————————————————————————————————————————————————
  74. ;
  75. ;     Used only in the LongMul function.
  76. Int64Bit                RECORD 0
  77. hiLong                     ds.l    1                ; offset: $0 (0)
  78. loLong                     ds.l    1                ; offset: $4 (4)
  79. sizeof                     EQU *                    ; size:   $8 (8)
  80.                         ENDR
  81.     IF FOR_SYSTEM7_AND_SYSTEM8_PREEMPTIVE THEN
  82. ;
  83. ; pascal Boolean BitTst(const void *bytePtr, long bitNum)
  84. ;
  85.     IF ¬ GENERATINGCFM THEN
  86.         _BitTst:    OPWORD    $A85D
  87.     ELSE
  88.         IMPORT_CFM_FUNCTION BitTst
  89.     ENDIF
  90.  
  91. ;
  92. ; pascal void BitSet(void *bytePtr, long bitNum)
  93. ;
  94.     IF ¬ GENERATINGCFM THEN
  95.         _BitSet:    OPWORD    $A85E
  96.     ELSE
  97.         IMPORT_CFM_FUNCTION BitSet
  98.     ENDIF
  99.  
  100. ;
  101. ; pascal void BitClr(void *bytePtr, long bitNum)
  102. ;
  103.     IF ¬ GENERATINGCFM THEN
  104.         _BitClr:    OPWORD    $A85F
  105.     ELSE
  106.         IMPORT_CFM_FUNCTION BitClr
  107.     ENDIF
  108.  
  109. ;
  110. ; pascal long BitAnd(long value1, long value2)
  111. ;
  112.     IF ¬ GENERATINGCFM THEN
  113.         _BitAnd:    OPWORD    $A858
  114.     ELSE
  115.         IMPORT_CFM_FUNCTION BitAnd
  116.     ENDIF
  117.  
  118. ;
  119. ; pascal long BitOr(long value1, long value2)
  120. ;
  121.     IF ¬ GENERATINGCFM THEN
  122.         _BitOr:    OPWORD    $A85B
  123.     ELSE
  124.         IMPORT_CFM_FUNCTION BitOr
  125.     ENDIF
  126.  
  127. ;
  128. ; pascal long BitXor(long value1, long value2)
  129. ;
  130.     IF ¬ GENERATINGCFM THEN
  131.         _BitXor:    OPWORD    $A859
  132.     ELSE
  133.         IMPORT_CFM_FUNCTION BitXor
  134.     ENDIF
  135.  
  136. ;
  137. ; pascal long BitNot(long value)
  138. ;
  139.     IF ¬ GENERATINGCFM THEN
  140.         _BitNot:    OPWORD    $A85A
  141.     ELSE
  142.         IMPORT_CFM_FUNCTION BitNot
  143.     ENDIF
  144.  
  145. ;
  146. ; pascal long BitShift(long value, short count)
  147. ;
  148.     IF ¬ GENERATINGCFM THEN
  149.         _BitShift:    OPWORD    $A85C
  150.     ELSE
  151.         IMPORT_CFM_FUNCTION BitShift
  152.     ENDIF
  153.  
  154.     IF GENERATING68K THEN
  155. ;
  156. ; pascal void LongMul(long a, long b, Int64Bit *result)
  157. ;
  158.     IF ¬ GENERATINGCFM THEN
  159.         _LongMul:    OPWORD    $A867
  160.     ELSE
  161.         IMPORT_CFM_FUNCTION LongMul
  162.     ENDIF
  163.  
  164.     ENDIF
  165.     ENDIF
  166.     ENDIF ; __TOOLUTILS__ 
  167.  
  168.